home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #3 / Amiga Plus CD - 2002 - No. 03.iso / AmiSoft / Game / Data / Fs_swuo2.lha / SWUO2 / Mod.install < prev    next >
Encoding:
Text File  |  2002-12-18  |  2.8 KB  |  109 lines
  1. ; $VER: Freespace Mod v1.2
  2. ; Script to install Freespace Mods
  3. (complete 0)
  4. (set #locale 0)
  5.  
  6. (set @language (getenv "Language"))
  7.  
  8. ; Englische Locale
  9.  
  10. (set #wichtig
  11.  (cat "\nATTENTION!!\n\n"
  12.         "This script will install new table files, too. If you have the drawer data/tables then you`ll should make a backup from it."
  13. ))
  14.  
  15. (set #welcome
  16.  (cat "\nWelcome to this Freespace Mod!!\n\n"
  17.       "This script will install the Second Wave Unit One Campaign on your hard disk.\n"
  18.       "\nRemember that this files needs Freespace.\n\n"
  19.       "\nPlease visit our homepages, too.\n"
  20.       "\nhttp://www.amigalien.de"
  21.       "\nhttp://www.amiga-freespace.de.vu"
  22. ))
  23.  
  24. (set #CA-query-text
  25.  (cat "Where do you installed the Freespace main programme?"
  26. ))
  27.  
  28. (set #CA-query-help
  29.  (cat "\nYou must choose the Freespace drawer on your hard disk (e.g. Work:Games/Freespace not Work:Games) but you must not creat a new drawer for this files."))
  30.  
  31. (set #helpdir "english")
  32. (set #pdir "english")
  33.  
  34. ; Deutsche locale:
  35. (
  36.  if (= @language "deutsch") (
  37.  
  38. (set #wichtig
  39.  (cat "\nACHTUNG!!!\n\n"
  40.       "Dieser Skript installiert neue Table Dateien. Bitte machen Sie ein Backup von data/tables."
  41. ))
  42.  
  43.   (set #welcome
  44.    (cat "\nWillkommen zur Installation von der Second Wave Unit One Kampagnie.\n\n"
  45.         "Dieses Skript wird alle Dateien auf Ihrer Festplatte installieren. Bedenken Sie, dass Freespace benötigt wird.\n\n"
  46.         "\nBesuchen Sie doch auch mal die Homepages von Amig@lien:\n"
  47.         "\nhttp://www.amigalien.de"
  48.         "\nhttp://www.amiga-freespace.de.vu"
  49.   ))
  50.  
  51.   (set #CA-query-text
  52.    (cat "Bitte wählen Sie das Freespace Verzeichnis aus."
  53.   ))
  54.  
  55.   (set #CA-query-help
  56.    (cat "\nWählen Sie das Freespace Verzeichnis auf ihrer Festplatte aus (z.B. Work:Spiele/Freespace/), in das diese Daten kopiert werden sollen.\n\n"
  57.         "Eine neue Schublade muss nicht erstellt werden."
  58.   ))
  59.  
  60.   (set #locale 1)
  61.   (set #helpdir "deutsch")
  62.   (set #locdir "deutsch")
  63.   (set #pdir "deutsch")
  64.  )
  65. )
  66.  
  67.  
  68. ;********************************************************************
  69.  
  70. (effect "center" "radial" $000000 $000000)
  71. (showmedia "capic" "data/logo_freespace.jpg" "upper_center" "none" 0)
  72. (showmedia "capic" "data/logo_amigalien.gif" "lower_right" "none" 0)
  73. (showmedia "capic" "data/logo_web.jpg" "lower_left" "none" 0)
  74.  
  75. (complete 20)
  76.  
  77.  
  78. (message #wichtig)
  79. (message #welcome)
  80.  
  81. (set thedir (askdir (prompt #CA-query-text) (help #CA-query-help) (default "Work:")))
  82. (set @default-dest thedir)
  83. (makedir @default-dest)
  84.  
  85. (complete 45)
  86.  
  87. (copyfiles (source "install/data")
  88.            (dest (tackon @default-dest "Data/"))
  89.            (all)
  90. )
  91.  
  92. (complete 70)
  93.  
  94. (showmedia "readme" "SWUO2.guide" "lower_left" "none" 1 "panel")
  95.  
  96. (complete 85)
  97.  
  98. (makedir (tackon @default-dest "Mod_Docs"))
  99.  
  100. (copyfiles (source "SWUO2.guide")
  101.            (dest (tackon @default-dest "Mod_Docs"))
  102.            (all)
  103. )
  104.  
  105. (complete 100)
  106.  
  107. (exit)
  108.  
  109.